home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / SCH110B.ZIP;1 / DMBROW.PRG < prev    next >
Encoding:
Text File  |  1993-02-24  |  537 b   |  22 lines
  1. *****
  2. * Edit the existing database
  3. *****
  4. clearscrn()
  5. superbox(0,0,24,79,.t.,"≤",.f.)
  6. superbox(02,05,04,75,.f.,"",.t.)
  7. say(03,28,"Edit the Address Database")
  8. superbox(05,05,20,75,.f.,"",.t.)
  9. say(20,11,"ENTER-Select/Deselect for Edit  DEL-Delete record  ESC-Exit")
  10. do while .t.
  11.     *****
  12.     * See the Dbedit() description in the online help to see how the 
  13.     * CUSTOM option is used.
  14.     *****
  15.     mv_udfname="dmedit"
  16.     dbedit(06,06,19,74,.t.,"custom")
  17.     if lastkey()=27
  18.         return
  19.     endif
  20. enddo
  21. return
  22.